inherited FMovVale: TFMovVale
  Left = 244
  Top = 207
  Width = 747
  Caption = 'Movimenta'#231#227'o de Vale'
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnl1: TPanel
    Width = 731
    Height = 105
    inherited BtMostraConsulta: TSpeedButton
      Left = 700
    end
    inherited pnl3: TPanel
      Width = 521
      inherited pnl5: TPanel
        Width = 338
      end
    end
    inherited ScrollBox1: TScrollBox
      Width = 521
    end
    inherited pnl11: TPanel
      Top = 156
      Width = 712
    end
    inherited pnl12: TPanel
      Width = 520
    end
    inherited pnl13: TPanel
      Left = 537
    end
    inherited chklstOrdenacao: TCheckListBox
      Left = 537
    end
    inherited pnl14: TPanel
      Width = 690
    end
    inherited BtLimpar: TBitBtn
      Left = 634
    end
    inherited BtLocalizar: TBitBtn
      Left = 538
    end
    inherited pnl7: TPanel
      Width = 711
      Height = 0
      inherited dbgConsulta: TDBGrid
        Width = 709
      end
    end
  end
  inherited pnl2: TPanel
    Top = 105
    Width = 731
    Height = 382
    inherited BtMostraEdicao: TSpeedButton
      Left = 700
    end
    object Lb2: TLabel [5]
      Left = 168
      Top = 64
      Width = 63
      Height = 13
      Caption = 'Valor do Vale'
      FocusControl = dbedtVALORVALE
    end
    object Lb3: TLabel [6]
      Left = 80
      Top = 64
      Width = 81
      Height = 13
      Caption = 'Data da Retirada'
      FocusControl = dbedtDTVALE
    end
    object Lb5: TLabel [7]
      Left = 8
      Top = 104
      Width = 35
      Height = 13
      Caption = 'Pessoa'
      FocusControl = dbedtCODPESSOA
    end
    object Lb6: TLabel [8]
      Left = 8
      Top = 64
      Width = 33
      Height = 13
      Caption = 'C'#243'digo'
      FocusControl = dbedtCODVALE
    end
    inherited BtNovo: TBitBtn
      Left = 392
    end
    inherited BtGravar: TBitBtn
      Left = 469
    end
    inherited BtCancelar: TBitBtn
      Left = 546
    end
    inherited BtExcluir: TBitBtn
      Left = 623
    end
    inherited pnl15: TPanel
      Width = 690
    end
    object dbedtVALORVALE: TDBEdit
      Left = 168
      Top = 80
      Width = 134
      Height = 21
      DataField = 'VALORVALE'
      DataSource = dsPadrao
      TabOrder = 5
    end
    object dbedtDTVALE: TDBEdit
      Left = 80
      Top = 80
      Width = 81
      Height = 21
      DataField = 'DTVALE'
      DataSource = dsPadrao
      TabOrder = 6
    end
    object dbedtCODPESSOA: TDBEdit
      Left = 8
      Top = 120
      Width = 73
      Height = 21
      Color = clYellow
      DataField = 'CODPESSOA'
      DataSource = dsPadrao
      TabOrder = 7
      OnDblClick = dbedtCODPESSOADblClick
      OnExit = dbedtCODPESSOAExit
    end
    object dbedtCODVALE: TDBEdit
      Left = 8
      Top = 80
      Width = 65
      Height = 21
      Color = clSilver
      DataField = 'CODVALE'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 8
    end
    object EdDescPessoa: TEdit
      Left = 80
      Top = 120
      Width = 417
      Height = 21
      Color = clGray
      ReadOnly = True
      TabOrder = 9
    end
    object PnlInfo: TPanel
      Left = 312
      Top = 64
      Width = 185
      Height = 41
      Caption = 'A Receber'
      Color = clRed
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 10
      OnDblClick = PnlInfoDblClick
    end
  end
  inherited qPadrao: TQuery
    AfterInsert = qPadraoAfterInsert
    AfterScroll = qPadraoAfterScroll
    SQL.Strings = (
      'SELECT * FROM VALE'
      'WHERE 1 = -1')
    object qPadraoDESCONTADOVALE: TStringField
      FieldName = 'DESCONTADOVALE'
      Origin = '"FPAGAMENTO.FDB".VALE.DESCONTADOVALE'
      Required = True
      Size = 1
    end
    object qPadraoVALORVALE: TFloatField
      FieldName = 'VALORVALE'
      Origin = '"FPAGAMENTO.FDB".VALE.VALORVALE'
      Required = True
    end
    object dtmfldPadraoDTVALE: TDateTimeField
      FieldName = 'DTVALE'
      Origin = '"FPAGAMENTO.FDB".VALE.DTVALE'
      Required = True
    end
    object qPadraoEMPRESA: TIntegerField
      FieldName = 'EMPRESA'
      Origin = '"FPAGAMENTO.FDB".VALE.EMPRESA'
      Required = True
    end
    object qPadraoCODPESSOA: TIntegerField
      FieldName = 'CODPESSOA'
      Origin = '"FPAGAMENTO.FDB".VALE.CODPESSOA'
    end
    object qPadraoCODVALE: TIntegerField
      FieldName = 'CODVALE'
      Origin = '"FPAGAMENTO.FDB".VALE.CODVALE'
      Required = True
    end
  end
  inherited qGenerica: TQuery
    Left = 472
    Top = 72
  end
  inherited qTipo: TQuery
    Left = 472
    Top = 40
  end
end
